home *** CD-ROM | disk | FTP | other *** search
- ; --------------------------------
- ; WinShuffle installation script
- ;
- ; $VER: InstallWS 1.0 (11.12.95)
- ; --------------------------------
-
- ; choose which parts to install
- ;
- (set choice
- (askoptions (prompt "Which parts do you want to be installed")
- (help @askoptions-help)
- (choices " WinShuffle program"
- " WinShuffle docs"
- )
- (default -1)
- )
- )
-
- ; [possibly] copy program
- ;
- (if (BITAND choice $01)
- ; --- then
- ((set pgm_dir ;then
- (askdir
- (prompt "Where do you want the Winshuffle program to be copied ?")
- (help "If you want Winshuffle to be started on every boot "
- "the WBStartup drawer on your boot partition or disk "
- "is the right place"
- )
- (default "SYS:WBStartup")
- )
- )
- (copyfiles
- (prompt ("copying Winshuffle program to %s" pgm_dir))
- (source "WinShuffle")
- (dest pgm_dir)
- (nogauge)
- (infos)
- ))
- ) ; --- end-if
-
- ; [possibly] copy docs
- ;
- (if (BITAND choice $02)
- ; --- then
- ((set doc_dir
- (askdir
- (prompt "Where do you want the Winshuffle docs to be copied ?")
- (help @askdir-help)
- (default "HELP:English")
- )
- )
- (copyfiles
- (prompt ("copying Winshuffle docs to %s" doc_dir))
- (source "WinShuffle.guide")
- (dest doc_dir)
- (nogauge)
- (infos)
- ))
- ) ; --- end if
-
- ; set appropriate destination
- ;
- (set @default-dest pgm_dir)
-